F 13 


>>> 
>>> 
>>> 
>>>>>> 
>>>>>> 
>>>>>> 
NNW MNNNNYW 
NNN NNNMNYW 
NNW NMNMNMMMYW 
NNN NNW ANN 
Nw NNW NNW 
NNW NNM NNW 
NNW NNN NNW 
NNW NNW NNW 
NNN NNW NW 
NN NNW NWN 
NNW NNW NNW 
NNW NNW NNN 
MNNMMMNWM NNW 
NMYVNNW Mn 
NNNYMNMNM ANM 
aaaaaa 
aaaaaa 
aaaaaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa aaa 
aaa. aaa 
aacaaaaadaqacaaadcadaacaaaa 
gaQaaaaaaaanaaaaaaaanaaa 
gaqaaqaacagaaacaqgcdaqadcaqaaaqaaaaaa 
mee 
a 
eee 
eee 
ee 
oo 


Ce ne ee eee 
ee 
Re ee eh 


oo 

oo 

a 

od 

eee 

ood 

wus Wu 
rreyreyrY) Wu 
wu wus 
wus wus Wu 
wus wus www 
PPeyrey ry) wus Www 
wu wus wus 
wus wus wus 
wus www Wwusw 
wusw wus wus 
Prey Terry wus wus 
wu wus www 


a a oa a Dt | 
333333333333333333 


33 
35 
P= | 
a Pe | 
a 
oa a 
a at 
a 
pon em | 
=: 
55 


eeF ILEee]DeeSATSSF13 


-— atten 

va 

oarey 

vs Aa tk 
vee aed 
ua te ka 
ver i 
Panes i 


a 
te ka 


nn NNN 
nw rn me 
nw nw mw 
WwW nw wn 
nn nw nw 
nn nw nw 
nw nw nw 
NNNNM nn 
NNNW on 
nw ANNM 
nw OMWInw 
an an nn 
ann nw nw 
nn nw an 
nn nw nn 
nn nn ann 
nn nn nw 
NMNMYM ow 
NNMYN on 
tae 
me 
es 
bo 


ah aud aul au a ah ah a ae ae ae a 
al uel aaa el ae eel ee ae ae ee ee 


222222222222 


222222222222 


nw NNN 
ann YNNMN 
nw Www nn 
nw nn Atoed 
nn nn AA 
nn nn es 
nn nn ann 
nn nw wn 
ANNMN nw 
NNNM own 


nn Munn 
nw MWMWMn 
nw “nw wn 
WwW nw “wn 
ANNM nw 
NNN wn 
oun oe 


LLLLLLLLLL 
LLLLLLLLLL 


—_— $$ $$, 


6 


B 
(FAILING S. 16-SEP-1984 00:41:49 VAX/VMS Macro v04-00 


= SATS SYSTEM SERVICE TESTS 


Table of contents 


SATSSF13 


— 

2 

vey 

” J 
F 3 ve w 
jw 
a e2oz 
-_es + oe! 
f-ORK NIM FORK NOK OM TO NOK NOK NW Ee 

qYddddd ddd dee tUYYYD 

VF VYVVLEYEYUYVVAQRAGAA808GB aqaidw 


RVUNUIN — OD KH MNO OD — MINN. ~F OD OF. 
NODOMWV- OTR. ONT OO - MODOMUMF. OFrwW 
KOMI IN ST FT TT TOMNIN OOO OPR-P-P_PR. CODD 


LOLOL LOLOL LO Le mm Lm, Lm, Ly my im, Lm, Lm, fm, Lm, hm Fm, fm, fm, fm fm 
SO III OOOO 
ee a a a a ee es ee 


C 6 
SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S$. 16-SEP-1984 00:41:49 VAX/VMS Macro V04- Page 1 SA} 
5042800 Set} 7 4:29:04 Se Teey RES SAY SSF S.MAR: 1 ° ( 


TLE $ATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S.C.) 


Tl 
- IDEN v04-000' 


ARERR AAAASAASAAAASARAALARLAASASARASSAAARALAREA SALA SAL SALAS ESA AA SAAR ELE SAAS SS 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH T 

INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY 
THE SOFTWARE IS HEREBY 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
Se okat itn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 
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FACILITY: SATS SYSTEM SERVICE TESTS 


ABSTRACT: THE SATSSF13 MODULE TESTS THE EXECUTION O 
; VMS_SYSTEM SERVICES, INVOKED IN SUCH A WAY AS TO EXPECT 
; STATUS CODES. THE SYSTEM SERVICES TESTED AND THE STATUS 

EXPECTED ARE SUMMARIZED AS ARGUMENTS TO THE TESTSERV MAC 
WHICH APPEAR NEAR THE END OF THIS LISTING. SUCCESSFUL STATUS 
CODES ARE TESTED IN OTHER MODULES. 


F AIN 
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ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVI P 
DYNAMICALLY ACQUIRES OTHER PRIVILEG AS NEEDED. 


AUTHOR: THOMAS L. CAFARELLA CREATION DATE: MMM, 1978 
PAUL D. FAY (DISPSERV & TESTSERV MACROS) 


MODIFIED BY: 
, 8 VERSION 
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SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 1 ~$EP-1984 0:4 AX/VMS Macro V04-0 Page 2 
v06 DECLARATIONS SEP=1984 04:2 UETPSY.SRCJSATSSF13.MAR;1 (1) 
§ -SBTTL DECLARATIONS 
¢ 3; INCLUDE FILES 
$ SPHDDEF ; PROCESS HEADER OFFSET SYMBOL 
SPCBDEF ; PROCESS CONTROL BLOCK OFFSET SYMBS 
g SSTSDEF : STATUS MESSAGE SYMBOLS 
SPRVDEF : SYMBOL DEFS FOR PRIVILEGES 
9 60 SUETPDEF : UETP MSG CODE DEFINITIONS 
61 SSHR_MESSAGES UETP,116,<<TEXT, INFO>> 
0 6¢ : DEFINE UETPS_TEXT 
0 6 + GET RID OF MACRO DEFINITIONS 
0 64 SPSLDEF ; ACCESS MODE SYMBOLS 
0000 66 ; MACROS: 
$000 gb 
009 $° ; EQUATED SYMBOLS: 
00000000 0000 71 WARNING = 0 : WARNING SEVERITY VALUE FOR MSGS 
00000001 0000 0 SUCCESS = 1 + SUCCESS SEVERITY VALUE FOR MSGS 
90000008 000 73 ERROR = : : ERROR SEVERITY VALUE FOR 
00000003 0000 #74 INFO = ; INFORMATIONAL SEV VALUE FOR MSGS 
00000004 0000 75 SEVERE = 4 : SEVERE (FATAL) SEV VALUE FOR MSGS 
00000000 0000 6 TCG_NO = 0 : INITIALIZE TEST CASE GROUP 
00000000 0000 77 GRP-TOTAL = 0 : INITIALIZE TEST CASE GROUP TOTAL 
OOOO7FFF 0000  ##78 RO_THRU SP = “M<RO,R1,R2,R3,R4,R5,RO,R7,RB,R9,R10,R11,AP,FP,SP> 
00000000 0000 79 PRADA COA1 = 0 ; INADR ARG FOR CRETVA (LOCATION 0) 
0000001 0000 80 AE TADR CVA2C0 0 = 1 : RETADR ARG FOR CRETVA (LOCATION 1) 
0000000 0000 81 INADR BVA1 = 0 ; INADR ARG FOR DELTVA (LOCATION 0) 
00000001 0000 Be RET RETADR 5bvAzo = 1 : RETADR ARG FOR DELTVA (LOCATION 1) 
00000000 0000 INA = 0 > INADR ARG FOR PURGWS (LOCATION 0) 
00000001 909 84 al AWS20 = 1 : WSETLM ARG FOR ADJWSL (LOCATION 1) 
0000 86 ; OWN STORAGE: 
0000 = «87 : 
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SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP=1 0: AX/VMS Macro V04- Page 
v04 DECLARATIONS oat at ri ee Se a es 
0000 9 -PSECT RODATA,RDNOWRT ,NOEXE ,LONG 
BFFC 0 REG_COMP_MASK: .WORD  “M<R2,R$,R4,R5, R6,R7,RB,R9-RIO.R11,AP.FP> ! *x8000 - 
;REG COMPARE MASK’ (HIGH-ORDER ... 
: : se. BIT must BE ON 
ERR_MSG_FAOCTL: STRING 1,<!/!AC!17B!12B: REGISTER !2UW CONTENTS ALTERED>, - 
4 <: BeFOuE SERVICE. ¢ CALL: !8XL_ AFTER SERVICE CALL: !8XL> 
$f 95 TEST_MOD_NAME: STRING C,<S : TEST MODULE NAME 
%6 TEST-MOD-BEG: STRING (C,<begun> : DISPOSITION FIELD OF TEST MOD MSG 
4 97 TEST_MOD_SUCC: STRING C. <success ful> ; DISPOSITION FIELD OF TEST MOD MSG 
8 8 TEST-MOD-FAIL: STRING : DISPOSITION FIELD OF TEST MOD MSG 
O8F TEST-MOD-NAME_D: STRING I, SeSATSSFI3> ; TEST MODULE NAME DESCRIPTOR 
0 9F 100 TTNAME: STRING TERMINAL LOGICAL NAME 
00000000" 99000000" A9 101 :~SINADR: . LONG NOACCESS, noaccess » PAGE ADDRESS OF NOACCESS PSECT 
0000000' 0 7 : PROT: .LONG PRTSC_NA ; PROTECTION CODE FOR NOACCESS PSECT 
FFFFFFFFE FREFFFFF 5 103 ONES: .LONG =1,- + A QUADWORD OF 1-BITS 
0BD 104 INADR_CVA10: + INADR ARGUMENT FOR CRETVA 
OBD 105 INADR-DVA1 : INADR ARGUMENT FOR DELTVA 
80000000" OBD 1 .ADDRESS *x80000000 Bo a aietie 
8F000000' OC} 1 “ADDRESS *X8F 000000 te 
000000CD O0CS 108 RETADR_ CVA 1: -BLKL + RETADR ARGUMENT FOR CRETVA 
00000005 00CD 109 RETADR_D 1: BLKL + RETADR ARGUMENT FOR DELTVA 
0005 110 ACMOD + ACMODE ARGUMENT FOR CRETVA 
0005s 111 AE RDE ~bVA: > ACMODE ARGUMENT FOR DELTVA 
00000003 0005 1 .LONG PSLS$C_USER 
00000000'00000000' 0009 113 INADR Pus: -ADDRESS 0,0 ; INADR ARGUMENT FOR PURGWS 
00000001 00€1 114 PAGCNT_A -LONG 1 ; PAGCNT ARGUMENT FOR ADJWSL 
OO0000E9 OOES 115 WSETLMa iitie -BLKL 1 + WSETLM ARGUMENT FOR ADJWSL 
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SATSSF13 - SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:41:49 VAX/VMS Macro V04- Pa 4 
v04 DECLARATIONS -SEP- 32 $0 :33i60 LOE Tee eRe Seay cers S.maRs1 - (1) 
000 8 117 -PSECT RWDATA,RD,WRT,NOEXE 
4 118 TPID: -BLKL 1 ; PROCESS ID FOR THIS PROCESS 
$ 4 119 CURRENT_TC: BLKL 1 ; PTR TO CURRENT TEST CASE 
8 120 REG_SAVE_AREA: .BLKL 15 ; SAVE AREA FOR ALL REGS (SANS PC) 
48009 44 121 MOD-MSG CODE:  .LONG YETPS_SATSHS ; TEST MODULE MSG CODE FOR PUTMS 
90 of 48 122 CLOB_REG_NO: ~BLKL ; CLOBBERED REG NO (FOR FAO ERR MSG) 
5 4 125 REG_BEFORE_SS: .BLKL 1 ; REG CONTENTS BEFORE S.S. 
124 3... (FOR FAO ERROR MSG) 
00000054 125 REG_AFTER_SS: .BLKL 1 ; REG CONTENTS AFTER S.S. 
4 1 § 3... (FOR FAO ERROR MSG) 
4 127 SSTSTNSS: STRING C,< SF > ; ASCII PORTION OF TEST CASE NAME 
00 $f. 1 g TMN_ADOR: - ADDRESS fEST_MOD_NAME ; ADDR OF TEST MOD NAME FOR FAO 
* 006 129 TMD-ADDR: -ADDRESS TEST_MOD-B ; ADDR OF T.M. DISP FIELD FOR FAO 
8 0 $8 064 130 TS_EP: -—BLKL 1 ; ENTRY PNT FOR CURR TESTSERV MACRO 
000 O¢ 131 RETADR: ~BLKL ¢ 3 RETURN LONGWORDS FOR SETPRT 
0000071 $ 1 § PRVPRT: LKB ; PROT RETURN BYTE FOR SETPRT 
0000079 7 133 PRIVMASK: -BLKQ) 1 3 ADDR OF PRIVILEGE MASK (IN PHD) 
BR08 7D 0079 134 CHM_CONT: -BLKL 1 3 CHANGE MODE CONTINUE ADDRESS 
0091 007D 135 REGS: -BLKL 5 ; AREA FOR COND INDEX REGS (R2-R6 
S208 00911 § INADR_CVA: ~BLKL : INADR ARGUMENT FOR CRETVA SERVI 
000000A1 poe? 137 INADR-CVA11 ~BLKL : INADR ARGUMENT FOR CRETVA SERVI 
000000A9 O0A1 1 8 RETADR_CVA: ~BLKL ; RETADR ARGUMENT FOR CRETVA SERV 
000 QOA9 139 INADR_BVA: »BLKL : INADR ARGUMENT FOR DELTVA SERVI 
00000089 0081 140 INADR-DVA11: ~BLKL : INADR ARGUMENT FOR DELTVA SERVI 
000000C1 00B9 141 RETADR_DvA: ~BLKL ; RETADR ARGUMENT FOR DELTVA SERV 
000000C5 00C1 142 WSETLM_AWS: -BLKL 1 ; WSETLM ARGUMENT FOR ADJWSL SERV 
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.PSECT SATS s ,Accy ig. 1,RD WRT ,NOEXE , PAGE 
; RESERVE A PAGE OF SPACE 


Page 5 
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+ 
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* THE ORDER OF STATEMENTS IN THIS PSECT 53 CRITICAL. * 
e DO NOT RE“ARRANGE THE VARIABLES. CONSULT SATS * 
* FUNCTIONAL SPECIFICATION FOR A DESCRIPTION OF THE USE * 
* OF THE EMPTY PSECT (AND ITS COMPANION PSECT, NOACCESS). * 
s 
® 


(AR RRRARARARASALARAAAADALASASARA SAA A RASA RA RASA SAAR RRA R ALAR AREAS AS SS 


TYPE AAAAA_SSSX1 (TYPE AAAAA_SSSX2_ IF NOT DESC) GO HERE: 
= 


R_CVA14 .-7 ; INADR ARGUMENT FOR CRETVA 
RETADR_CVA22 z.-/7 ; RETADR ARGUMENT FOR CRETVA 
INADR_BVA14 z=.-/7 : R ARGUMENT FOR DELTVA 
RETADR_DVA22 =.,-7 3 RETADR ARGUMENT FOR DELTVA 
INADR_PwS1 =.-7 ; INADR ARGUMENT FOR PURGWS 
WSETLA_AWS22 2,21 ; WSETLM ARG FOR ADJWSL (LAST BYTE IN PAGE) 

=.= 13 ; ALLOW ROOM FOR STRING DESCRIPTOR 
; TYPE AAAAA_SSSXS GO HERE: 
LON G 6 ; STRING LENGTH (WILL CROSS PSECT BOUNDARY) 
DRESS .+4 : STRING ADDRESS 


TYPE AMAAA_SSSKS” GO HERE: 
; 1 LOW-ORDER BYTE OF STRING LENGTH 
TYPE AAAAA_SSSK2 GO HERE: 


; STRING LENGTH 


.PSECT SATS A CCVI0_2,RD,WRT ,NOEXE , PAGE 
NOACCESS: Lk6 31g" ; RESERVE A A PAGE OF SPACE 
- 51 : RETURN LOC CTR TO BEGINNING OF PSECT 
"ADDRESS EMPT : ADDR ESS OF ACCESSIBLE STRING 
“ADDRESS EMPTY/*X100 t ADDRESS OF ACCESSIBLE STRING 
3+ 
; ##* NOTE == DO NOT CHANGE LOCATION OR SEQUENCE OF ABOVE STATEMENTS 
; eee THIS PSECT (NOACCESS) MUST APPEAR IN MEMORY IMMEDIATELY 
3 ee FOLLOWING THE EMPTY PSECT. PSECT NAMES AND OPTIONS WILL BE 
3 eee CHOSEN TO FORCE THE DESIRED PSECT ORDERING. 
iNADR_ CVA1 : INADR ARGUMENT FOR CRETVA 
INADR™DVA1 : INADR ARGUMENT FOR DELTVA 
INADR~ ~pUsti: ae : INADR ARGUMENT FOR PURGWS 
.PSECT SATSSF13,RD,WRT,EXE,LONG 


WITH RESP 


Vuww <5>>>w 
ew §—W www 


(DCL COMMAND) 


S MERELY TO SET UP CONDITIONS REQUIRED 
CE AND TO CLEAN UP ANY RESOURCES ACQUIRED 


CASE. 


MESSAGES TO SYSSOUTPUT ARE THE ONLY OUTPUT FROM SATSSF13. 


-SBTTL SATSSF13 
F’NCTIONAL DESCRIPTION: 
$ RUN SATSSF13 
INPUT PARAMETERS: 
NONE 
IMPLICIT INPUTS: 
NONE 
OUTPUT PARAMETERS: 
NONE 
IMPLICIT OUTPUTS: 
THEY ARE OF THE FORM: 


wOoOTtwowwo> 
Zurerr-EF 2D 


oP 
: CALLING SEQUENCE: 


++ 


(END MSG) 
END MSG) 
EST MODULE FAILURE) 


(BEGIN MSG) 
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D BY UETPS_SATSMS. 


IT TO THE 


COMPLETION CODES: 
SIDE EFFECTS: 
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SATSSF13 = SATS SYSTEM SERVICE TESTS CFAILING S. 16-SEP-1984 00:41:49 VAX/VMS 
$042000 Saree 1s ety 7 8e 29:04 YETPsy. 
; ; NONE 
4; 
i SATSSF13: 
OFFC 60 .WORD “M<R2,R3,R4,R5,R6,R7,RB,RI,R10,R11> 
0 61 ; ENTRY MASK 
00 6¢ SWAKE_S TPID : GET PID OF THIS PROCESS 
1 6 HI + UNDO WAKE 
18 64 SSETPRR_S TEST_MOD_NAME_D ; SET PROCESS NAME 
0c82. 30 «00 65 BSBW ROD. msG T + PRINT TEST MODULE BEGIN MSG 
00000060' EF 90000070" EF DE 0 : 66 MOVAL 1 nob $ CC,TMD_ADDR : ASSUME END MSG WILL SHOW SUCCESS 
00000044'EF 03 00 O01 F 0 67 INSV Buti .#3,M0B_MSG_ CODE; ADJUST STATUS CODE of0R SUCCESS 
O3¢ 268 MODE ORE ; KERNEL MODE TO ACCESS P 
59 00000000'°9F DO 0059 269 MOVL seer R9 GET PROCESS HEADER ADDRESS 
00000071'EF 69 ODE 0060 70 MOVAL PHS Sat rUtisk CRO) . PRIVMASK GET PRIV MASK ADDRE 
006 71 MODE FROM, TOS ; GET BACK TO USER MODE 
0068 7 PRIV _— ADD, ALL ; GET ALL PRIVILEG 
088 27 DISPSERV SET UP DISPLAY INFO FOR TESTSERV 
021D 27% Be TPRT Ss INADR=INADR RETADR= <RETADR, 
021D 75 PROT=PROT, PRVPRT=PRVPRT 
O23E 27 SET NOACCESS PSECT ... 
' O23E 27 FOR NO USER ACCESS 
0906 «(31 0 i 28 BRW EXECUTE : GO EXECUTE ALL TEST CASES 
0241 280 TC_GROUP CVA,1,TS1 
0268 281; 
0268 282 NEXT_TEST_CASE SFCVA10 
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:49 \VAX/VMS Macro Vv04-0 Page 
SFCVAIO if ve 


UETPSY.SRCJSATSSF15.MAR; 1 


2) REGISTERS R2 THROUGH FP UNCHANGED 
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6 33 
? ¢ s suscndsandudeuseuseensenbinsedbabenneseenntuensdannsed 
: 

é § : * TEST CASE NAME: SFCVA10 

6 : : * SYSTEM SERVICE: CRETVA 

: 31 ; * ARGUMENT UNDER TEST: INADR_CVA10 

6 38 ; INPUT CONDITIONS: 

6 94 3 ISSUE CRETVA WITH RANGE OF ADDRESSES IN 
95: * SYSTEM SPACE. 

6 88 $f 

6 97 : * EXPECTED RESUL Ts: 

6 98: * 1) SYSTEM STATUS CODE: NOPRIV 

6 99 ; * 

6 0 3; * 

6 13 

6 8 : 

6 03 ; 

6 04; 

6 05 


OOCOCCOO 


NEXT_TEST_CASE SFCVA11 


Es 
SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:41:49 VAX Macro V04- P 
vO0=000 SFeVAN 973Eb= o8e 92:59:04 LUE BRESSAYSSF 4 S.MAR; 1 (1) vO 


4 

¢ « pendsenesbecuqnonsenedneentecebsenenenneneensesneensen 
é TEST CASE NAME: SFCVA11 

& SYSTEM SERVICE: CRETVA 

4 ARGUMENT UNDER TEST: INADR_CVA11 


INPUT erie S$: 
CREATE A PAGE ALREADY OWNED BY EXEC MODE. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: PAGOWNVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 


PARR RARSARARARAAARALARALALAARARARARRRSALAL ARERR LAL ASE SS | 


ae eee eeneeeneennen 


TO, 10$, EXEC ,NOREGS AF eae EXEC MODE FOR EXPREG 


ODE 
SEXPREG _S PAGCNT=41, RETADR=INADR_¢ 
ise A 1=PAGE REGION OWNED BY EXEC MODE 
MODE FROM, 10$ : BACK TO USER MODE 


NEXT_TEST_CASE SFCVA12 


WTO oe ee et et ee et oe eo 
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9042000 SFCVAT2 greeks beisoic, LOeeéeS 4 wih 
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" panoenenncnenevbonesedsnaszensnenosoneceeseencesconecs 
TEST CASE NAME: SFCVA12 
SYSTEM SERVICE: CRETVA 
ARGUMENT UNDER TEST: INADR_CVA12 


INPUT CONDITIONS: 
INPUT ADDRESS FIELD AT LOCATION 0. 


EXPECTED RESUL 5 ¢ 
1) SYSTEM STA TUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 


LARA RARARARASALASARRARELASESAREE SELES E SRS R RRR ASR REESE A 


eae eneneneeneeanneannn 


MODE 20$,EXE .NOREGS ; INTO EXEC MODE FOR CNTREG 
SCNTREG_S 10th T=#1 ; GIVE BACK PAGE ACQUIRED BY SFCVAI1 
MODE “Prom 20$ : BACK TO USER MODE 


NEXT_TEST_CASE SFCVA13 


SVT OCOWBWWWWVIVIWVVIVIOIVIVIOIOIVWVIOOIOW 
OE ET at a kk kh hh at ht 
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SSS8g3 je dAhtgSvaven sence vases celal 8. gape tnes Seshet EON SEAS a "OO Hs 
‘ae 
EA 8 : PRRRRRASASAASALESALASASESA REESE ERE R RRS ES ERAS SESE EEL SEES 
at 
EA és ; * SYSTEM SERVICE: CRETVA 
EA 63 ; * ARGUMENT UNDER TEST: INADR_CVA13 
EA 863 ; * INPUT CONDITIONS: 
EA 368: INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT. 
EA 370 ; * EXPECTED RESULTS: 
OOEKA 371: * 1) SYSTEM STATUS CODE: ACCVIO 
! EA te iy 2) REGISTERS R2 THROUGH FP UNCHANGED 
EA 74 5 eeeeeeeerereeererereeeeeeeerereneteeeereeeeeeeeeeeeeee 
an 
O2EA 378 * NEXT_TEST_CASE SFCVA14 
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* 
. TEST CASE NAME: SFCVA14 
. SYSTEM SERVICE: CRETVA 
. ARGUMENT UNDER TEST: INADR_CVA14 
* INPUT CONDITIONS: 
* SECOND LONGWORD OF INPUT ADDRESS FIEL 8 BEGINS IN 
ss ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT. 
* EXPECTED RESU LTS: 
* 1) SYS TEM” STAI S CODE: ACCVIO 
* 2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFCVA20 
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TEST CASE NAME: SF CVA20 

SYSTEM SERVICE: CRETVA 

ARGUMENT UNDER TEST: RETADR_CVA20 


INPUT CONDITIONS: 
RETURN ADDRESS FIELD AT LOCATION 1. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFCVA21 
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. 

2 TEST CASE NAME: SFCVA21 

; SYSTEM SERVICE: CRETVA 

: ARGUMENT UNDER TEST: RETADR_CVA21 

* INPUT CONDITIONS: 

: RETURN ADDRESS FIELD IN READ-ONLY PSECT. 
® vad St wes Tet 

* 1) SYSTEM STATUS CODE: ACCVIO 

* 2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFCVA22 
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1 ree : PARBAAALASLALALALLALALALAALALALLAELEAELE LES ELLA EE REESE ESAS GS 
A 2 2 
A e31 3 . TEST CASE NAME: SFCVA22 
VA 4 : : * SYSTEM SERVICE: CRETVA 
1A i34 : * ARGUMENT UNDER TEST: RETADR_CVA22 
1A 6 : * INPUT CONDITIONS: 
1A 457: SECOND LONGWORD OF RETURN ADDRESS FIELD BEGINS IN 
A 438 i ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT. 
0 1A 460 : * EXPECTED RESULTS: 
1A 461: 1) SYSTEM STATUS CODE: ACCVIO 
8 i re) : . 2) REGISTERS R2 THROUGH FP UNCHANGED 
O31A 464 : RARER AERA EA AAEAAEAAEEEAAEAEAAAAAAAERARRARREEEE 
O31A 465 ;-- 
O31A 466 : 
O31A 467 : 
O31A 


468 TCEND 
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ie 4? TC_GROUP DVA,1,TS2 
42 672° NEXT_TEST_CASE SFDVA10 
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rh ren 
4 $f? : PARRBAAAAAALALALALALALALALLALEALSLE SESE SESE TERE EERE RRR 
4 4 s & 
4 or ; * TEST CASE NAME: SFDVA10 
4 478 ; * SYSTEM SERVICE: DELTVA | 
4 4 1: * ARGUMENT UNDER TEST: INADR_DVA10 | 
on. 4 g > * INPUT CONDITIONS: 
40 484: * ISSUE DELTVA WITH RANGE OF ADDRESSES IN 
4 4 5: SYSTEM SPACE. 
§ ® 
aie § : : * EXPECTED RESULT 
42 488: * 1) SYSTEM tT, TUS CODE: NOPRIV 
0 ‘ 489 %. 2) REGISTERS R2 THROUGH FP UNCHANGED 
034 491 : RERAAEAEAAAAEEAAE ETE EAEEAAAKAAAAARAEAAAERETERRAee Eee 
4 492 ;-- 
Og O88 
0342 495 ° NEXT_TEST_CASE SFDVA11 
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; GET A_1=-PAGE REGION OWNED BY EXEC MODE 
MODE FROM, 10$ ; BACK TO USER MODE 


NEXT_TEST_CASE SFDVA12 


4 3 
4 138 p++ 
rt 2 § é PARAAAAAAAAAAAAALAAAAAAAAAAEALERARALASASER ARERR ESE R AALS SE 
3 + 
7: 0 ; * TEST CASE NAME: SFDVA11 
aE : : * SYSTEM SERVICE: DELTVA 
ae 4 ; * ARGUMENT UNDER TEST: INADR_DVA11 
4E 5 : * INPUT CONDITIONS: 
dE pit DELETE A PAGE ALREADY OWNED BY EXEC MODE. 
4E 9 3 * EXPECTED RESULTS: 
4E 510: 1) SYSTEM STATUS CODE: PAGOWNVIO 
0 dE 1 ;¢ 2) REGISTERS R2 THROUGH FP UNCHANGED 
8 4E \§ : LARARBAAAAASAAAAALALALALALELLASLARERA REEL A RRR R ERE A EASES SE SS 
4E 14 ;-- 
O34E 515: 
O34E 516 MODE _‘ TO, 10$, EXEC ,NOREGS ; GET INTO EXEC MODE FOR EXPREG 
0368 517 SEXPREG_S PAGCNT=#1, RETADR=INADR_DVA11 
O37E 518 
O37E 519 
037 320 
O37F = $21 


Tn Tmm 


OE 


H 7 
SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:41:49 YAX/VMS Macro V04- 
v0u=000 SFBVAI2 873E p= 1984 2:39:64 UETPSY .SREISATSSF 1 S.MAR: 1 


ARB RRARAAAASAAAAAAAASASLALASELEL EASES ASE ARREARS ELS SS 


4 I  copenecousaseeonnsesonesedonscnedeneoeeqesesesnenseees 
3 
; § 3 z TEST CASE NAME: SFDVA12 
3 8 : * SYSTEM SERVICE: DELTVA 
B 0 ; * ARGUMENT UNDER TEST: INADR_DVA12 
8 ; > * INPUT CONDITIONS: 
B zie INPUT ADDRESS FIELD AT LOCATION 0. 
5 : * EXPECTED RESULTS: 
$ ; 1) SYSTEM STATUS CODE: ACCVIO 
fis 2) REGISTERS R2 THROUGH FP UNCHANGED 
9: 
ay 
4¢ 3 MODE TO 208. gEXEC. NOREGS ; INTO EXEC MODE FOR CNTREG 
0 4 SCNTREG_S PAGCNT=A1 : GIVE BACK K PAGE | ACQUIRED BY SFDVA11 
44 MODE “FROM, os : BACK TO USER MODE 
46 


000 ~va0 G9 & oo oD 


oo 
Ww 


NEXT_TEST_CASE SFDVA13 
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TEST CASE NAME: SFDVA13 
SYSTEM SERVICE: DELTVA 
ARGUMENT UNDER TEST: INADR_DVA13 


INPUT CONDITIONS: 
INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT. 


wind ie i RESULT r 
SYSTEM STATUS CODE: ACCVIO 
2} REGISTERS R2 THROUGH FP UNCHANGED 
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D 71 3 

D oe 3 

° Se 3 TEST CASE NAME: SFDVA14 

p 03 : * SYSTEM SERVICE: DELTVA 

p 7 ; * ARGUMENT UNDER TEST: INADR_DVA14 

D 8 : * INPUT CONDITIONS: 

D 80 : SECOND LONGWORD OF INPUT ADDRESS FIELD BEGINS IN 
p Jie ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT. 
D : : * EXPECTED RESULT 

D 4: 1) SYSTEM tT TUS CODE: ACCVIO 

D0 538 2) REGISTERS R2 THROUGH FP UNCHANGED 

D0 a : 

DO 88 ; 

DO }3=—6s 889 gw 

DO 36590 ; 

dO) 591 
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NEXT_TEST_CASE SFDVA20 
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TEST CASE NAME: SFDVA20 
SYSTEM SERVICE: DELTVA 
ARGUMENT UNDER TEST: RETADR_DVA20 


INPUT CONDITIONS: 
RETURN ADDRESS FIELD AT LOCATION 1. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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NEXT_TEST_CASE SFDVA21 
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TEST CASE NAME: SFDVA21 
SYSTEM SERVICE: DELTVA 
ARGUMENT UNDER TEST: RETADR_DVA21 


INPUT CONDITIONS: 
RETURN ADDRESS FIELD IN READ-ONLY PSECT. 


EXPECTED RESULTS 
1) SYSTEM STA AT $ CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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¥ ? 8 3 PARRBRAARAAAAARAZALALALASLALASASELESLESLESASESSES SELES 
2 = 
+ re 3 TEST CASE NAME: SFDVA22 
F4 4¢ : * SYSTEM SERVICE: DELTVA 
a 644 : ® ARGUMENT UNDER TEST: RETADR_DVA22 
Fe 646: 
F4 gt) : FIELD BEGINS I 
F4 648 : ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT 
FE 650: * EXPECTED RESU LTS: 
Fe 651: 1) SYSTER’ ET Aius CODE: ACCVIO 
Bare O26 3 2) REGISTERS R2 THROUGH FP UNCHANGED 
O3F4 654 : (ARRRBARAAARASLALAZASALALALELESESEESLEE SERRE REESE SESE EERE aS 
O3F4 655 == 
O3F4 656; 
O3F4 657; 
O3F4 658 TCEND 
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TEST CASE NAME: SFPWS10 

SYSTEM SERVICE: PURGWS 

ARGUMENT UNDER TEST: INADR_PWS10 


INPUT CONDITIONS: 
INPUT ADDRESS ARRAY AT LOCATION 0. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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TEST CASE NAME: SFPWS11 

SYSTEM SERVICE: PURGWS 

ARGUMENT UNDER TEST: INADR_PWS11 


INPUT CONDITIONS: 
INPUT ADDRESS ARRAY IN NON-ACCESSIBLE PSECT. 


EXPECTED RESULTS: 
1) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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EXPECTED RESULTS: 
) SYSTEM STATUS CODE: ACCVIO 
2) REGISTERS R2 THROUGH FP UNCHANGED 
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; TEST CASE NAME: SFPWS12 

: SYSTEM SERVICE: PURGWS 

. ARGUMENT UNDER TEST: INADR_PWS12 

* INPUT put Rbpaeet. 

® INPUT ADDRESS ARRAY BEGINS IN ACCESSIBLE 
: PSECT. ENDS IN NON-ACCESSIBLE PSECT. 
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4 C § : LAR RRAAAAAASALAAAAALALALALASESE LESSEE REA SESE SESE EASES 

45¢ ; ® 

4 c 33 ; * TEST CASE NAME: SF AWS20 

4 c 4] : * SYSTEM SERVICE: ADJWSL 

4o¢ 748 ; * ARGUMENT UNDER TEST: WSETLM_AwS20 

45C 745 ; * INPUT CONDITIONS: 

43¢ ro6 : 8 WORKING SET LIMIT FIELD AT LOCATION 1. 

45¢ 148 ; EXPECTED RESULTS: 

45C 749 3 * SYSTEM STATUS CODE: ACCVIO 

43¢ £30 : 3} REGISTERS R2 THROUGH FP UNCHANGED 

45C 75 MTITITITITITITITI TILL TTL LiL T tt 
$ 3 

043¢ 753 ;-- 

ae 

045 4756 * NEXT_TEST_CASE SFAWS21 
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' TC 
rh 34 +4 TC 
rf 3 FARRAR AASAAAAAAAALAALALALALALSZALALAALAEAL ERE SESE ER SEER ERS SS ve 
5 @ 
‘8 :s TEST CASE NAME: SFAWS21 Ys 
4 : ® SYSTEM SERVICE: ADJWSL TE 
46 98 3 TE 
46 £69 i* ARGUMENT UNDER TEST: WSETLM_AWS21 ve 
46 res : ® INPUT CONDITIONS: TE 
re 788 $- WORKING SET LIMIT FIELD IN READ-ONLY PSECT. ™ 
46 0 : * EXPECTED RESULTS: 
46 771; * 1) SYSTEM STATUS CODE: ACCVIO 
re} ore 3 7 2) REGISTERS R2 THROUGH FP UNCHANGED 
046 774 : RARAAAAAAAEAAEAAAEAAAATAEAAAAERAEAAAEREAEREERARAEEeEEe 
0468 775 :-- 
0468 076 : 
0468 777 ; 
0468 778 NEXT_TEST_CASE SFAWS22 
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rt} 8 ees 
474 ? : PARARAAAAAAAALALALALALALAAAAEAAAALESE SESE ESE EES EEE EES 
474 3 * 
oct 4 3 * TEST CASE NAME: SFAWS22 
3 ® 
424 , 5} * SYSTEM SERVICE: ADJWSL 
are ; * ARGUMENT UNDER TEST: WSETLM_AwS22 
474 789 : * INPUT CONDITIONS: 
; WORKING SET LIMIT FIELD BEGINS IN ACCESSIBLE 
cr 731 ; Psee CT, ENDS IN NON-ACCESSIBLE PSECT. 
3 & 
474 538 : * EXPECTED RESULTS 
474 794: * 1) SYSTEM STATUS CODE: ACCVIO 
424 195 3° 2) REGISTERS R2 THROUGH FP UNCHANGED 
bee ee : PARRAAALALALALALLALALALALALLELAESLESEE ELE RESELLER ESSE SS 
474 798 ;-- 
474 99 ; 
474 800; 
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47 j TS1: 

if : TESTSERV CRETVA,ERR,SATS, - 

4 5 <1, INADR_CVA, ~ 

47 : INADR_CVA10,NOPRIV, - ; SFCVA10 

4? INADR-CVA11,PAGOWNVIO, = ; SFCVA11 

47 : INADR-CVA12.ACCVIO, - 3 SF CVAlE 

47 INADR-CVA13,ACCVIO, - 3 SFCVAI 

4? 10 INADR~CVA14,ACCVIO, - } SFCVAI4 

158 Bi . : 

47 18 <1,RETADR_CVA - 

47 14 RETADR_CVA20,ACCVIO, = ; SFCVA20 

047 15 RETADR-CVAC1,ACCVIO, = ; SFCVA21 

4? 18 RETADR-CVAc2,ACCVIO, = 3; SFCVA22 

b258 8 " : 

047 15 <1, ACMODE_CVA, - 
047 631 ¥ 
0687 822 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 


J8 
SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 AX/V 4- 
v04 pitts se nice sage 8 E 38 2:3 :2 ibe U PsY.$ i$ i$ 98 MAR; 1 


-SEP-1 ETPSY.SREISATSSF 

x 3 TS2: 

A 4 TESTSERV DELTVA,ERR,SATS, - 
6A E <1, INADR_DVA, ° 
6A7 INADR_DVA10,NOPRIV, - ; SFDVAIO 
6A7 : INADR-DVA11,PAGOWNVIO, = ; SFDVAT1 
6A7 INADR-DVA12.ACCVI1O, - : SFDVAI 
6A7 0 INADR-DVA13,ACCV1O, - : SFDVAI 

A? 1 INADR-DVA14,ACCV1O, - : SFDVAI4 

A7 ¢ >, - 
6A7 ° 

A7 4 <1,RETADR_DVA - 

A? 7 RETADR_DVA20,ACCVIO, = ; SFDVA20 
6A7 : RETADR-DVAC1,ACCVIO, = 3; SFDVA21 
6A7 RETADR-DVA22.ACCVIO, = 3; SFDVA22 

06A7 8 >, ~ 
0647-839 - 
06A7 41 >, ie 
06A7 Bs 

0889 84 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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D9 B44 TS3: 
Dg B45 TESTSERV PURGWS ,ERR, SATS, > 
DSB? <1, INADR_PWS, - 
D 48 INADR_PWS10,ACCVIO, - ; SFPWS10 
D r INADR~PWS11.ACCVIO. - $ SFPWS11 
30 INADR=PWS12.ACCVIO, - J} SrPwsi2 z 
5 o 
33 TS_CLEANUP ; CLEAN UP & RETURN TO TEST_SERV_EXEC 
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SATSSF13 = SATS SYSTEM SERVICE TESTS (FAILING S. 16-SEP-1984 00:41:49 VAX/VMS Macro V04- Page 4 SA 
v04=000 SUBROUTINES =SEP=1984 0:30:00 LOE TPSY. SRETSAYSSF4 9.MAR:1 (3) vo 
B -SBTTL SUBROUTINES 
B REG_SAVE: 
B : IRR RAASASALASALALAAALASALELAELALL ESAS ESE SELES ESE EES ET ESET ET TESS 
Z * * 
8 ; * SAVES RO THRU SP IN REG_SAVE_AREA + 
3 ® 


& ® 
Seeodvounseoeoesseos —o 


PUSHR #RO_THRU_SP ; SAVE ALL REGS ON _, 
MOVCS #6 =(SP)7 REG_SAVE_AREA ; aye ry + Am $.S.) 
POPR #RO_T HRU_SP ; CLEAN UP STACK 

RSB 3 cece AND RETURN 
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OBDA 
OBDA ; 
08 A 
REG _REST: 
ae 
OBDA PARARALAAAASAALALAALALALLASALAESESL ESE REESE EERE EES ERE ERE EES EAS 
BDA 3 8 » 
dBA ; * RESTORES RO THRU SP FROM REG_SAVE_AREA ‘ 
® 
OBDA PARRAAASAALALALALLLALALALASLALASASEAALSLE SESE SE SAREE EERE EERE RE RR ERE RRS AS 
OBDA : 
SE 3¢ c2 OBDA SUBL2  #60,S ; MOVE SP TO MAKE ROOM FOR REGS 
6E  00000008'EF C 28 OBDD MOVC #60, REG SAVE_AREA,(SP) ; MOVE REGS ONTO STACK FOR 
FFF BA OBE> POPR §#RO_THRO_SP : RESTORE ALL RE REGS FOR FESTSERV 
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SUBROUTINES - UETPSY.SRCJSATSS (2) 
BEA REG_COMP: 
BEA 3 : PRARARAAARAAAARARAAAASAAAAAAAAALALALALALAL ALAR EE LER ERR REAR ARRAS 
EA s © © 
EA 36 : * 1) PUSHES ALL REGS ONTO STACK . 
BEA 993: * 2) COMPARES REGISTER IMAGES FROM STACK WITH CORRESPONDING * 
BEA 3 a IMAG GES REG SAVE_AREA FOR ALL REGISTERS SPECIFIED * 
$ oe 
BEA 296 > * 3) FOR nea H"UNEGOAL COMPARE, AN ERROR MESSAGE IS PRINTED * 
BEA 997: * FAO AND SOUTPUF SYSTEM SERVICES). * 
BEA 38 ; 2 # pops: Ae REGS OFF OF S . 
s ® 
EA 1 BY : REATAKAAEAATATATATAKTAEAAEAAEATAEAAAAARAAAAAARAKAARAAAAAAAARAAAARAARAAAAAAAEEEREAAEE 
EA 1001 ; 
7FFF 8F BB OBEA 1 0¢ PUSHR #RO_T ; SAVE Abt REGISTERS ON STACK 
56 Q0000008'EF DE OBEE 1 0 MOVAL REG- UNE “AREA, Rb : POINT R6 TO BEG OF ... 
OBF5 1004 t ... REGS (BEFORE S.S.) 
54 SE 00 OBFS 1 05 MOVL SP, R4 : POINT R4 10. BEG OF 
BF 8 1 : + we. REGS (AFTER S.S. 
53 FF 8F 98 OBF8 100 CVTBL #-1,R3 : INITIALIZE AREG. COMP_MASK INDEX 
OBFC 1008 REG_COMP_NEXT: 
53 D6 OBFC 1009 INCL sR : POINT TC NEXT BIT IN MASK 
53 OF 91 OBFE 1010 CMPB #15, R3 : END OF THE MASK ? 
03 1A OCO1 1011 BGTRU REG. COMP_CONT : NO == CONTIN UE. 
009F 31 0C03 101¢ BRW REG~COMP~RSB + YES == GO TO COMMON RETURN 
0C06 1013 REG_COMP_CONT: 
84 86 01 O¢ 8 1014 THPL = (R6) + (RO ; REG BEFORE = REG AFTER ? 
Fl 13 OCO9 1015 BEQLU REG COMP_N ES == LOOK FOR NEXT REG 
E9 00000000'EF 53 £1 O0CO 1016 BBC REG_ COME. XMASK, REG_ come -NEXT 
0C13 101 ~~ GET NEXT IF BIT NOT sei 
00000048'EF 53 DO OC13 1018 MOVL  _R3,CLOB_R NO -- GIVE REG NUMBER TO F 
QOOO0D4C'EF FC AS DO OCIA 1019 MOVL “a {RED RES. Sot EPORE ss i : GIVE "BEFORE CONTENTS 
Q0O0000SO'EF FC A4 00 O¢ 2 1020 MOVL (R4) REG AFTER SS ; GIVE “'AFTER™ CONTENTS TO FAO 
00000056'EF 2A 90 C A 19 1 MOVB PANay SBTSTNGS © +2 > GIVE FAILURE INDIC'N IN ERROR MSG 
C31 10 g $FAO_S MSG_FAOCTL,OUTL,OUTD, $$SNADSS, 
C31 10 4 ESASeass. $$ PSEQ$$,CLOB_REG_NO,REG “BEFORE _SS,REG_AFTER_SS 
F4A9 CF F473 CF BO 0664 8 6 MOVW ; ACTUAL OUTPUT LEN IN STRING DESC'R 
(6B 1027 PUTMSG ats PEXT, #1,#0UTD> ; PRINT THE MS 
F48D CF 0084 BF BO C80 1028 MOV OUTE-O0TB,OUTD ; GET MAX LEN BACK INTO DESCRIPTOR 
000 ‘EF 20 90 OC87 1029 MOVB A/ /,$$TSINS$#2 : REMOVE FAIL INDIC'N FOR NEXT MSG 
00000060" EF 90000088" 2S CBE 1030 MOVAL  TEST_MOD FALL ,TMD_ADDR : INDICATE FAILED IN END MSG 
00000044'EF 03 00 é FO 0C99 1031 INSV #ERROR,#0,#3,MOD_MSG CODE ; DJUST STATUS CODE FOR ERROR 
F 31 OCA2 1 : BRW REG_COMP_NEXT ; io” LOOK FOR NEXT REG TO COMPARE 
CAS 1033 REG_COMP_RSB: 
7FFF BF BA OCA 1034 POPR § #RO_THRU_SP : CLEAN UP STACK 
5 OCA9 1035 RSB : RETURN TO CALLER 
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MOD_MSG_PRINT: 


LARA RASRARAAAASALALASALALELASAL ARRAS A SESE SESSLER ERE R REESE RR EES SES 


® * 
* PRINTS THE TEST MODULE BEGUN/SUCCESSFUL/FAILED MESSAGES ® 
* (USING THE PUTMSG MACRO). ® 

® 


ARRAARARAAAAAAREAALALALALESAL AREA ALES ESE RRA SEER ERA E RRR ESE ES SO 


PUTMSG <MOD_MSG_CODE,#2,TMN_ADDR,TMD_ADDR> ; PRINT MSG 
RSB tee AND RETURN TO CALLER 


05 
HMRTN: 


MPAA ARAARRRAAAAAASARLALALALALEAL ALAA SALES ERAS ASRS SEER EASES SY 


. @ 
CHANGE MODE ROUTINE. THIS ROUTINE oe rs CONTROL WHENEVER 
R SYSTEM CE IS ISSUED 


t 
t 
: A CMKRNL, CMEXEC uP SERVI 
; BY THE MODE MACRO ('TO' IT MERELY DOE 
; A JUMP INDIRECT ON A FIELD SET UP BY MODE. IT HAS 
; THE EFFECT OF RETURNING TO THE END OF THE MODE 
; MACRO EXPANSION. 
® 
: PARRAAALALAAAAALLALALALLEASASLESLEASAESES ESSERE SER SEES ES ERE RRS AESS SY 
0000 : .WORD 0 ; ENTRY MASK 
00000079'FF 17 jmp @CHM_CONT t RETURN TO MODE MACRO IN NEW MODE 


‘i RET INSTR WILL BE ISSUED IN EXPANSION OF ‘MODE FROM, ....° MACRO 
- END SATSSF13 
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Symbol table ‘ 
114 R 
SSSCHARS = 0000004 OUTD | 
SSSFIRSTTCSSS : 0 0 QUTE 6 6 1A0 R : | 
S$SSTRINGS = Pee OUT ae | 
FBR 6 PHD$Q_PRIVMSK = O0 | 
EB R 6 IVMASK Q 03 | 
SSCALLSS cS é or” 0000081 Ro 
SDISPS E s 6 PRT$C NA ReERRAAE x : 
SSERRSS A R 6 PRVPR 9000 979 R 0 
tye OOO0ES R 6 PSL$C_USER = 00 2000 
SEHAKPSE 2 999 5a RO THRU_SP : : Adi ‘ ~ 
sor oraee ang0oeF R 3 REG AFTER S$ 0 0050 R 03 
sSsennss 0000004 REG-BEFORE_SS Q00004C R B32 
$1] = 90000009 REGoCOMP O0008EA R 6 
$16 000000 4R 03 REG_COMP_CONT 00 Goede R 06 
saat ge Sassy Ean ae i 
ACMODE “DVA boooocce “COMP” QO000CAS R 06 
CHARTN™ oooooccs R Og > QO00BDA R 06 
CHR. C ide RECT SAVE 900008¢9 RO 
EN AEG NO So0008e8 R 68 REG SAVE_AREA 90000008 R 03 
CTLSGL PAD 90000006 ROS RETADR_CVA 000000A1 ROO 
suerte $690000 8 04 RETADR_CVA20 = 444 gy > 02 
ERROR * 0000008 R 02 RETADR=CVAS2 = 000001F9 R 04 
Exeturen 0900084 R 06 RETADR-DVA 90000089 R 03 
INABA “ $O0000A9 R 02 RETADR-DVASI 999000¢D R 02 
CVA 44 eu R 0 RETADR “ = 00000000 R 06 
INADR_CVA10 00000B8D R f SATSS : Sooo oo. 
INADR7CVA11 00000099 R 0 SEVERE . 4p 
INADRCVAI * $o000008 05 SHRS TEXT = $0091 90 
MADRE VAT QO0001F9 RO §S$_ACCVIO secesese oF 
INADR7CVA14 = 90001F9 R 04 $$$_ACCVI0 Soonanen LG 
INADR~DVA 0000 OA9 R 0 1 My paces ca 
INADR-BVAY 90000084 R 08 STSSV_INHIB_MSG = 9000001¢ 
INADRDVAI OO0001FS RO SYSSCMEXEC senseaee St OS 
INADR-PUS * 0000003 RO SY SSCMERNL qeeecers Gh OD 
Ropus 90000000.” SYSSCNTREG eesncess 
INADR_PWS10 = R 05 SYSSCRETVA eekkerenr GX 06 
IWADR~PUS I 0000 04 SYSSDELTVA peers. a 
INADR_PWS12 = 1F9 R SYSSEXIT keeeeere GX 6 
INFO = 0 0000 06 SYSSEXPREG Reeeeeee GX 6 
LIBSSIGNAL a eeeeae, ae SYSSFAO teeeeeee X06 
MEXIT s 00 94 03 SYSSFAOL Reeeaeeaee Gx 6 | 
MOD _MSG_CODE 8 44 R 06 SYSSHIBER terarene GX 6 
MOD" MSG_PRINT CAA R SYSSPURGUS tseeeeeee GX 06 
NARGS a 14 R 05 SYSSSETPRN keenenee GY 6 
NOACCESS 8 SYSSSETPRT eeaeeeenre GX 6 
NSSARGS s R 2 SYSSSETPRV eereneee GX 6 
ONES tR be SYSSWAKE eeteeeee GX 6 
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PSECT name Allocation PSECT No. Attributes 


og es wor — NOWRT NOVEC BYTE 


SATS SAC EVION 


1 
v10_2 
SATSshis 


AODoomMseso 
LLL LL PF 
Cc 
a 
2 
o 
i=) 

, 4 
2 
m 
a, 2, a, se, a, 
AOOOOON 
cere 
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NOSHR XE RD WRT NOVEC LONG 


Phase Page faults CPU Time Elapsed Time 


Initialization 0 0:00: 
ponnane processing 1 : 


68.08 
s 1 00-95 
Syabol table sort :00: 1.48 
Soebot table output 1 :00: 12 
Psect synopsis output 6 :00: 8 

77 1 $8 


Cross-reference output 
Assembler run totals 


} 
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ate phe, set Limit was 1990 pages. 
3502 bytes (164 pages) of virtual memory were used to buffer the intermediate ggde. 
eee were 40 pages of syane) table pee all a to hold 660 non-local and 1 Local symbols. 
source Lines were read in Pass produc cing object records in Pass 2. 
69 pages of virtual memory were used to define 53 macros. 


toes an anscee eee eee ee ce ene mae th 


! Macro library statistics : 


joune Se weeesceeeeeeeeoaeseeece + 


Macro Library name Macros defined 
genus See as MLB; 1 19 
teh MLB; 1 

Het ont C3 YSL18 STARLET, MLB; 2 2 

TeTare (all Libraries) 4 


1313 GETS were required to define 47 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=LIS$:SATSSF13/0BJ=OBJ$:SATSSF13 MSRC$:SATSSF13/UPDATE=(ENHS$: SATSSF 13) +EXECML$/LIB+SHRLIB$:UETP/LIB 


